       01  customer.
         03  name PIC X(32).
         03  R-number PIC S9(9) COMP-5.
